﻿Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click

        Dim a As Single
        Dim b As Single
        Dim c As Single

        a = CSng(tb1.Text)
        b = CSng(tb2.Text)
        c = a + b
        Label1.Text = CStr(c)

    End Sub
End Class